Voorbeeld van de functie StrConv

Dit voorbeeld gebruikt de functie StrConv om een tekenreeks in Unicode om te zetten in een ANSI-tekenreeks.

Dim i As Long
Dim x() As Byte
x = StrConv("ABCDEFG", vbFromUnicode)    ' Converteert tekenreeks.
For i = 0 To UBound(x)
    Debug.Print x(i)
Next